object fNewProgram: TfNewProgram Left = 340 Top = 214 BorderIcons = [biSystemMenu] BorderStyle = bsDialog Caption = 'New Program' ClientHeight = 301 ClientWidth = 423 Color = clBtnFace Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] KeyPreview = True OldCreateOrder = False Position = poMainFormCenter OnClose = FormClose OnCreate = FormCreate DesignSize = ( 423 301) PixelsPerInch = 96 TextHeight = 13 object bevBottom: TBevel Left = 0 Top = 256 Width = 423 Height = 45 Align = alBottom Shape = bsTopLine end object spbuNewUn: TSpeedButton Left = 392 Top = 177 Width = 23 Height = 22 Hint = 'Browse for a file' Caption = '...' Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [fsBold] ParentFont = False ParentShowHint = False ShowHint = True OnClick = spbuNewUnClick end object spbuNewDispIco: TSpeedButton Left = 392 Top = 222 Width = 23 Height = 22 Hint = 'Browse for a file containing an icon' Caption = '...' Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [fsBold] ParentFont = False ParentShowHint = False ShowHint = True OnClick = spbuNewDispIcoClick end object leReg: TLabeledEdit Left = 16 Top = 88 Width = 401 Height = 21 AutoSize = False BevelInner = bvLowered BevelKind = bkTile BevelOuter = bvNone BorderStyle = bsNone Ctl3D = True EditLabel.Width = 123 EditLabel.Height = 14 EditLabel.Caption = '&Registry Entry Name : ' EditLabel.Font.Charset = EASTEUROPE_CHARSET EditLabel.Font.Color = clWindowText EditLabel.Font.Height = -12 EditLabel.Font.Name = 'Tahoma' EditLabel.Font.Style = [] EditLabel.ParentFont = False Font.Charset = EASTEUROPE_CHARSET Font.Color = clWindowText Font.Height = -13 Font.Name = 'MS Sans Serif' Font.Style = [] ParentCtl3D = False ParentFont = False TabOrder = 0 end object leName: TLabeledEdit Left = 16 Top = 130 Width = 401 Height = 21 AutoSize = False BevelInner = bvLowered BevelKind = bkTile BevelOuter = bvNone BorderStyle = bsNone EditLabel.Width = 237 EditLabel.Height = 14 EditLabel.Caption = 'Program &Name (how it appears in the list) :' EditLabel.Font.Charset = EASTEUROPE_CHARSET EditLabel.Font.Color = clWindowText EditLabel.Font.Height = -12 EditLabel.Font.Name = 'Tahoma' EditLabel.Font.Style = [] EditLabel.ParentFont = False Font.Charset = EASTEUROPE_CHARSET Font.Color = clWindowText Font.Height = -13 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False TabOrder = 1 end object leUninstall: TLabeledEdit Left = 16 Top = 177 Width = 370 Height = 21 AutoSize = False BevelInner = bvLowered BevelKind = bkTile BevelOuter = bvNone BorderStyle = bsNone EditLabel.Width = 114 EditLabel.Height = 14 EditLabel.Caption = 'Uninstall &Command : ' EditLabel.Font.Charset = EASTEUROPE_CHARSET EditLabel.Font.Color = clWindowText EditLabel.Font.Height = -12 EditLabel.Font.Name = 'Tahoma' EditLabel.Font.Style = [] EditLabel.ParentFont = False Font.Charset = EASTEUROPE_CHARSET Font.Color = clWindowText Font.Height = -13 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False TabOrder = 2 end object leDisplayIcon: TLabeledEdit Left = 16 Top = 222 Width = 369 Height = 21 AutoSize = False BevelInner = bvLowered BevelKind = bkTile BevelOuter = bvNone BorderStyle = bsNone Ctl3D = True EditLabel.Width = 72 EditLabel.Height = 14 EditLabel.Caption = 'Display &Icon :' EditLabel.Font.Charset = EASTEUROPE_CHARSET EditLabel.Font.Color = clWindowText EditLabel.Font.Height = -12 EditLabel.Font.Name = 'Tahoma' EditLabel.Font.Style = [] EditLabel.ParentFont = False Font.Charset = EASTEUROPE_CHARSET Font.Color = clWindowText Font.Height = -13 Font.Name = 'MS Sans Serif' Font.Style = [] ParentCtl3D = False ParentFont = False TabOrder = 3 end object Panel1: TPanel Left = 0 Top = 0 Width = 423 Height = 60 Align = alTop BevelInner = bvRaised BevelOuter = bvLowered TabOrder = 4 object Image2: TImage Left = 2 Top = 2 Width = 419 Height = 56 Align = alClient Picture.Data = {} Stretch = True end object lWindowTitle: TLabel Left = 23 Top = 20 Width = 269 Height = 16 Caption = 'Add new program entry to Uninstall List' Color = clSilver Font.Charset = DEFAULT_CHARSET Font.Color = 1973790 Font.Height = -13 Font.Name = 'MS Sans Serif' Font.Style = [fsBold] ParentColor = False ParentFont = False Transparent = True end end object buCancel: TButton Left = 360 Top = 263 Width = 59 Height = 33 Anchors = [akLeft, akBottom] Cancel = True Caption = '&Cancel' Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -12 Font.Name = 'Tahoma' Font.Style = [] ModalResult = 2 ParentFont = False TabOrder = 5 end object buOK: TButton Left = 291 Top = 263 Width = 67 Height = 33 Anchors = [akLeft, akBottom] Caption = '&OK' Default = True Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [fsBold] ParentFont = False TabOrder = 6 OnClick = buOKClick end object odChoose: TOpenDialog Top = 272 end end